A creative and nice title

Fabricio Almeida-Silva

VIB-UGent Center for Plant Systems Biology

Quarto

Quarto enables you to weave together content and executable code into a finished presentation. To learn more about Quarto presentations see https://quarto.org/docs/presentations/.

Bullets

When you click the Render button a document will be generated that includes:

  • Content authored with markdown
  • Output from executable code

Code

When you click the Render button a presentation will be generated that includes both content and the output of embedded code. You can embed code like this:

1 + 1
[1] 2

Columns

List:

  1. Element 1
  2. Element 2
  3. Element 3

Right column:

  1. Element 1
  2. Element 2
  3. Element 3

Columns with figure

List:

This text somehow relates to the figure to the right.

vivb_logo

Footnotes

This is how you include footnotes1 at the bottom part of the page in slides.

Code and output below

library(ggplot2)
library(palmerpenguins)
ggplot(data = penguins, aes(x = species, y = flipper_length_mm)) + 
    geom_boxplot(aes(color = species), width = 0.3, show.legend = FALSE) +
    geom_jitter(
        aes(color = species), alpha = 0.5, show.legend = FALSE,
        position = position_jitter(width = 0.2, seed = 0)
    ) +
    scale_color_manual(values = c("darkorange","purple","cyan4")) +
    labs(x = "Species", y = "Flipper length (mm)") +
    theme_bw()

Code and output beside

```{r output_beside}
#| output-location: column
library(ggplot2)
library(palmerpenguins)
ggplot(data = penguins, aes(x = species, y = flipper_length_mm)) + 
    geom_boxplot(aes(color = species), width = 0.3, show.legend = FALSE) +
    geom_jitter(
        aes(color = species), alpha = 0.5, show.legend = FALSE,
        position = position_jitter(width = 0.2, seed = 0)
    ) +
    scale_color_manual(values = c("darkorange","purple","cyan4")) +
    labs(x = "Species", y = "Flipper length (mm)") +
    theme_bw()
```

Code highlighting

```{r code_highlighting}
#| code-line-numbers: 5-8
library(ggplot2)
library(palmerpenguins)
ggplot(data = penguins, aes(x = species, y = flipper_length_mm)) + 
    geom_boxplot(aes(color = species), width = 0.3, show.legend = FALSE) +
    geom_jitter(
        aes(color = species), alpha = 0.5, show.legend = FALSE,
        position = position_jitter(width = 0.2, seed = 0)
    ) +
    scale_color_manual(values = c("darkorange","purple","cyan4")) +
    labs(x = "Species", y = "Flipper length (mm)") +
    theme_bw()
```

Panels - tabset

This is an example panel set describing bill lengths of palmer penguins:

summary(penguins$bill_length_mm[penguins$species == "Adelie"])
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
  32.10   36.75   38.80   38.79   40.75   46.00       1 
summary(penguins$bill_length_mm[penguins$species == "Gentoo"])
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
  40.90   45.30   47.30   47.50   49.55   59.60       1 
summary(penguins$bill_length_mm[penguins$species == "Adelie"])
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
  32.10   36.75   38.80   38.79   40.75   46.00       1 

Here’s where you can find me: